home *** CD-ROM | disk | FTP | other *** search
/ Acorn User: China / Acorn User China CD-ROM (UK) (Disc B) / Acorn User China CD-ROM (UK) (Disc B).bin / STUTTGART / GRAPHICS / TOOLS / FRACPAINT / !FracPaint_!Run < prev    next >
Encoding:
Text File  |  1994-08-31  |  801 b   |  25 lines
  1. | FracPaint !Run file
  2. |
  3. | (c) 1993, 1994 Michiel van Schaik
  4.  
  5. WimpSlot -min 352K -max 352K
  6. Set FracPaint$Dir <Obey$Dir>
  7. Set FracPaint$Path <FracPaint$Dir>.
  8.  
  9. Set RiscOS$Version 3.20
  10. RMEnsure UtilityModule 3.20 Set RiscOS$Version 3.10
  11. RMEnsure UtilityModule 3.10 Set RiscOS$Version 2.00
  12. If "<RiscOS$Version>"="2.00" Then Error You need RiscOS 3.10 or later to run FracPaint
  13.  
  14. If "<ColourMap$Path>" = "" then Set ColourMap$Path FracPaint:ColourMaps.,FracPaint:^.ColourMaps.
  15.  
  16. IconSprites <FracPaint$Dir>.!Sprites
  17. Set File$Type_045 FracPars
  18. Set File$Type_046 ColorMap
  19. Set Alias$@RunType_045 "Run FracPaint:!Run %%*0"
  20. Set Alias$@PrintType_045 "Run FracPaint:!Run -print %%*0"
  21.  
  22. WimpSlot -min 352K -max 352K
  23.  
  24. If "<RiscOS$Version>"="3.10" Then Run FracPaint:!RunImage -fonts %*0 Else Run FracPaint:!RunImage %*0
  25.